cond
*.nrg 2999 >
*22 0 =
start
7 22 store
stop

cond
*22 0 >
start
-1 *22 add 22 store
stop

cond
*22 6 =
start
50 .repro store
stop

cond
*22 5 =
start
13 .tie store
stop

cond
*22 4 =
start
314 .aimdx store
stop

cond
*22 3 =
start
*22 971 store
50 .repro store
stop

cond
*22 1 =
start
24 .tie store
stop


cond
*.robage 0 =
start
1 .deltie store
stop

cond
*.robage 10 >
*23 0 =
start
5 23 store
stop

cond
*23 0 >
start
-1 *23 add 23 store
stop

cond
*23 4 =
start
13 .readtie store
24 .tiepres  store
stop

cond
*23 3 =
start
500 .fixlen store
stop

cond
*23 2 =
start
24 .readtie store
stop

cond
*.trefeye
0
!=
start
-1
.shoot
store
stop
end